home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 5 / Skunkware 5.iso / src / Games / ms-0.07 / xms / label.c < prev    next >
C/C++ Source or Header  |  1995-06-26  |  2KB  |  63 lines
  1. /* label.c - report underflow using an Athena Label widget */
  2.  
  3. /*
  4.   (This has not been tested with X11R3 so it is currently disabled
  5.   on X11R3 and older.  It might work anyway.) 
  6. */
  7.  
  8. /*  
  9.     This file is part of MandelSpawn, a network Mandelbrot program.
  10.  
  11.     Copyright (C) 1990-1993 Andreas Gustafsson
  12.  
  13.     MandelSpawn is free software; you can redistribute it and/or modify
  14.     it under the terms of the GNU General Public License, version 1,
  15.     as published by the Free Software Foundation.
  16.  
  17.     MandelSpawn is distributed in the hope that it will be useful,
  18.     but WITHOUT ANY WARRANTY; without even the implied warranty of
  19.     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20.     GNU General Public License for more details.
  21.  
  22.     You should have received a copy of the GNU General Public License,
  23.     version 1, along with this program; if not, write to the Free 
  24.     Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  25. */
  26.  
  27. #include <stdio.h>
  28.  
  29. #include <X11/IntrinsicP.h>
  30. #include <X11/Xos.h>
  31. #include <X11/StringDefs.h>
  32.  
  33. #include <X11/Xaw/Label.h>
  34.  
  35. #include <X11/Shell.h>    /* needed for XtNvisual */
  36.  
  37. #include "MsP.h"    /* this is really part of the Ms widget */
  38. #include "Mama.h"
  39.  
  40. extern Screen *myScreen;
  41.  
  42. char underflow_msg[] = "Lost precision\n\nZoom out or reduce window size\n\
  43. to regain picture";
  44.  
  45. void MsCreateUnderflowLabel(w)
  46.      MsWidget w;
  47. { Arg arglist[10];
  48.   int num_args=0;
  49.  
  50.   XtSetArg(arglist[num_args], XtNlabel, underflow_msg); num_args++;
  51.   XtSetArg(arglist[num_args], XtNx, 10); num_args++;
  52.   XtSetArg(arglist[num_args], XtNy, 10); num_args++;
  53.  
  54.   XtSetArg(arglist[num_args], XtNbackground, MamaWhite(w->ms.mama));
  55.   num_args++;
  56.   XtSetArg(arglist[num_args], XtNforeground, MamaBlack(w->ms.mama));
  57.   num_args++;
  58.  
  59.   w->ms.underflow_label =
  60.     XtCreateManagedWidget(underflow_msg, labelWidgetClass,
  61.               (Widget) w, arglist, num_args);
  62. }
  63.